with Ada.Numerics.Float_Random; use Ada.Numerics.Float_Random;
with Ada.Numerics.Discrete_Random;

package global is

   type is_machine_to_fix is new Integer range 1..100;

   w_delay : Duration := 1.0;
   MAX_TASKS : constant Integer := 10;
   MAX_PRODUCTS : constant Integer := 10;
   MAX_MACHINES : constant Integer :=2;
   PROBABILITY_OF_CRASH : constant Integer :=50;

end global;
